www.gusucode.com > 中国货源网导航程序源码 1 > 中国货源网导航程序源码 1.0/8月11日备份/showurl.asp
<!--#include file="mdb.asp"-->
<%
id=request.querystring("id")
set r=server.createobject("adodb.recordset")
r.open "select out,yl_outtime from detail where id="&id,conn,1,3
if not r.eof then
r("out")=r("out")+1
r("yl_outtime")=now()
r.update
end if
sql="select * from detail where id="&id
set rsc=conn.execute(sql)
id=rsc("id")
url=rsc("url")
title=rsc("title")
memo=rsc("memo")
out=rsc("out")
conn.execute (sql)
rsc.close
set rsc=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta HTTP-EQUIV=refresh Content='0;url=<%=url%>'>
<title><{{site}}>｜中国最大最全货源网址导航,免费收录货源网站</title>
<link rel="stylesheet" href="css/style.css">
</head>
<body>
<p> </p>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD vAlign=center align=middle>
</TD></TR>
</TBODY></TABLE>
<TABLE height=300 cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD vAlign=center align=middle>
<p>正在为您打开</p>
<p>=====<FONT COLOR="#ff0000"><b>【<%=title%>】</b></FONT>=====</p>
<p>【<%=title%>】被点击<%=out%>次</P>
<p>所花时间取决于该站的连接速度和当前网速</p>
<p>请耐心等待，或直接点击下面的连接</p>
<p><a href="<%=url%>">打开中请稍等-----【<%=title%>】-----</a></p>
<p><FONT COLOR="#008000">再一次感谢您对本站的支持...热情为你服务！</FONT></p></TD></TR>
<TR>
<TD height=3></TD></TR>
</TD></TR>
</TBODY></TABLE>
</body>
</html>